home *** CD-ROM | disk | FTP | other *** search
/ Workplace Effectiveness:…ecision-Making Strategies / Workplace Effectiveness: Decision-Making Strategies.iso / pc / Files / Menu1.dxr / 00010_Main button controls.ls < prev    next >
Encoding:
Text File  |  1998-12-16  |  603 b   |  33 lines
  1. property clicked, movieChoice
  2.  
  3. on mouseDown me
  4.   set the clicked of me to 1
  5.   puppetSound("mouseDown.aif")
  6. end
  7.  
  8. on mouseUp me
  9.   if the clicked of me then
  10.     case the spriteNum of me of
  11.       10:
  12.         backToMain()
  13.       11:
  14.         showSndCntrl()
  15.       12:
  16.         printButton()
  17.     end case
  18.   end if
  19.   set the clicked of me to 0
  20. end
  21.  
  22. on mouseUpOutSide me
  23.   set the clicked of me to 0
  24. end
  25.  
  26. on beginSprite me
  27.   set the clicked of me to 0
  28. end
  29.  
  30. on getBehaviorDescription
  31.   return "Main button action on mouseUp, based on channel number." & RETURN & "Works only if mouseDown occured on this sprite."
  32. end
  33.